home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Demos / AppMaker 2.0b3 / Demo AppMaker 1.5 / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpC_1022_PictMulti < prev    next >
Encoding:
Text File  |  1992-04-08  |  623 b   |  28 lines
  1. %case window field%
  2.     ControlHandle    %HandleName%;
  3.     short            %fieldName%;
  4. %case create%
  5.     cur->%HandleName% = GetNewControl (%cntlID%, newWindow);
  6.     cur->%FieldName% = GetCtlMin (cur->%HandleName%);
  7.     %Enable?%
  8. %case track%
  9.     if (whichControl == cur->%HandleName%) {
  10.         TrackMulti (cur->%HandleName%, where, &cur->%fieldName%);
  11.     }
  12. %case itemNr%
  13.     %DefineItem%
  14. %case dialog field%
  15.     short            %fieldname%;
  16.     %Enable?%
  17.     %haveField%
  18. %case init field%
  19.     info->%fieldname% = 1;
  20.     %Enable?%
  21. %case set%
  22.     SetCtlChoice (%Itemname%, info->%fieldname%);
  23.     %Enable?%
  24. %case hit%
  25.     case %itemname%:
  26.             DoMultiState (itemNr, &info->%fieldname%);
  27.         break;
  28.